home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 130
/
130.d81
/
endit 1
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
300b
|
12 lines
55990 rem endit #1 08/10/93
56000 sp$=" [154] [146]"
56010 fori=1to5
56020 print"[147]":poke53281,0:poke53280,3
56030 poke214,1:print
56040 forx=1to21:printsp$:nextx
56050 poke214,2:print
56060 forz=3to19step2:poke646,z:printtab(z)"that's all folks":next
56070 print:fory=1to500:next
56080 forz=19to3step-2:poke646,z:printtab(z)"this is the end.":next
56090 forll=1to500:nextll:nexti:end